Labels:book | bulletin board | poster | reckoner | sky | tree | windowpane OCR: 111-28 Mops Predefined Classes chsch&skip c--b What p.no expect Searches as for chsearch: and if the char found Pos set pointing to the next character Lim S unchanged chskip?: c--b Searches for the character NOT equal to This method has couple of differences to the other searching metl thods, dictated by what we normally need it for. If it suceeds, Pos (not Lim) Is set to that position, and it is always case sensitive, regardless of CASE? chskip: c-- As for chskip?: but returns no boolean result scanning scan: (trtbl --n Searches for a single character using translate table "Success is defined as character which yields non-zero value from the table The return result is this non-zero value zero T none was found. On success as usual, Lim set tc point to the found character <scan: (trtbl -- n ...
